object fFrequencia: TfFrequencia
  Left = 192
  Top = 132
  Width = 800
  Height = 557
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  PopupMenu = PopupMenu1
  Position = poDesktopCenter
  OnCreate = FormCreate
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 784
    Height = 58
    Align = alTop
    PopupMenu = PopupMenu1
    TabOrder = 0
    object Label1: TLabel
      Left = 8
      Top = 5
      Width = 87
      Height = 20
      Caption = 'Colaborador'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object Label2: TLabel
      Left = 442
      Top = 5
      Width = 35
      Height = 20
      Caption = 'Data'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object Label3: TLabel
      Left = 554
      Top = 5
      Width = 35
      Height = 20
      Caption = 'Hora'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object Label4: TLabel
      Left = 636
      Top = 7
      Width = 35
      Height = 20
      Caption = 'Hora'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object ComboBox1: TComboBox
      Left = 8
      Top = 24
      Width = 433
      Height = 28
      BevelKind = bkFlat
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ItemHeight = 20
      ParentFont = False
      PopupMenu = PopupMenu1
      TabOrder = 0
    end
    object data1: TJvDatePickerEdit
      Left = 443
      Top = 24
      Width = 108
      Height = 28
      AllowNoDate = True
      BorderStyle = bsNone
      Checked = True
      BevelKind = bkFlat
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      PopupMenu = PopupMenu1
      TabOrder = 1
    end
    object horaentrada: TMaskEdit
      Left = 553
      Top = 24
      Width = 64
      Height = 28
      BevelKind = bkFlat
      BorderStyle = bsNone
      EditMask = '!90:00;1;_'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      MaxLength = 5
      ParentFont = False
      PopupMenu = PopupMenu1
      TabOrder = 2
      Text = '  :  '
    end
    object horasaida: TMaskEdit
      Left = 635
      Top = 24
      Width = 64
      Height = 28
      BevelKind = bkFlat
      BorderStyle = bsNone
      EditMask = '!90:00;1;_'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      MaxLength = 5
      ParentFont = False
      PopupMenu = PopupMenu1
      TabOrder = 3
      Text = '  :  '
    end
  end
  object PageControl1: TPageControl
    Left = 0
    Top = 64
    Width = 633
    Height = 245
    ActivePage = TabSheet1
    PopupMenu = PopupMenu1
    TabOrder = 1
    object TabSheet1: TTabSheet
      Caption = 'PRESENTES'
      object JvDBGrid1: TJvDBGrid
        Left = 0
        Top = 0
        Width = 625
        Height = 217
        Align = alTop
        DataSource = DtSrc
        PopupMenu = PopupMenu1
        TabOrder = 0
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -11
        TitleFont.Name = 'MS Sans Serif'
        TitleFont.Style = []
        OnCellClick = JvDBGrid1CellClick
        AutoSizeColumns = True
        SelectColumnsDialogStrings.Caption = 'Select columns'
        SelectColumnsDialogStrings.OK = '&OK'
        SelectColumnsDialogStrings.NoSelectionWarning = 'At least one column must be visible!'
        EditControls = <>
        RowsHeight = 17
        TitleRowHeight = 17
        Columns = <
          item
            Expanded = False
            FieldName = 'DATA'
            Title.Caption = 'Data'
            Width = 43
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'NOMECLIENTE'
            Title.Caption = 'Colaborador'
            Width = 251
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'HORAINICIO'
            Title.Caption = 'Hora Entrada'
            Width = 143
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'HORASAIDA'
            Title.Caption = 'Hora Saida'
            Width = 168
            Visible = True
          end>
      end
    end
  end
  object PageControl2: TPageControl
    Left = 0
    Top = 309
    Width = 633
    Height = 207
    ActivePage = TabSheet2
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    PopupMenu = PopupMenu1
    TabOrder = 2
    object TabSheet2: TTabSheet
      Caption = 'AUSENTES'
      object JvDBGrid2: TJvDBGrid
        Left = 0
        Top = 0
        Width = 625
        Height = 179
        Align = alClient
        DataSource = dtsrcAusentes
        PopupMenu = PopupMenu1
        TabOrder = 0
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clBlack
        TitleFont.Height = -11
        TitleFont.Name = 'MS Sans Serif'
        TitleFont.Style = []
        AutoSizeColumns = True
        SelectColumnsDialogStrings.Caption = 'Select columns'
        SelectColumnsDialogStrings.OK = '&OK'
        SelectColumnsDialogStrings.NoSelectionWarning = 'At least one column must be visible!'
        EditControls = <>
        RowsHeight = 17
        TitleRowHeight = 17
        Columns = <
          item
            Expanded = False
            FieldName = 'NOME'
            Title.Caption = 'Colaborador'
            Width = 608
            Visible = True
          end>
      end
    end
  end
  object Panel2: TPanel
    Left = 646
    Top = 58
    Width = 138
    Height = 461
    Align = alRight
    PopupMenu = PopupMenu1
    TabOrder = 3
    object BitBtn1: TBitBtn
      Left = 11
      Top = 10
      Width = 118
      Height = 55
      Caption = 'F2-Entrada'
      PopupMenu = PopupMenu1
      TabOrder = 0
      OnClick = BitBtn1Click
      Glyph.Data = {
        36240000424D3624000000000000360000002800000030000000300000000100
        20000000000000240000C40E0000C40E00000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000006D6D6DFF6D6D6DFF666666FF6A635FFF666666FF6A635FFF6666
        66FF6A635FFF6A635FFF666666FF6A635FFF666666FF666666FF6D6D6DFF6D6D
        6DFF6D6D6DFF6D6D6DFF6D6D6DFF000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        00006D6D6DFF666666FFA53F19FF7E4027FFC04013FFA53F19FFC04013FFA53F
        19FFC04013FFA53F19FFC04013FFA53F19FFA53F19FFA53F19FF7E4027FF7E40
        27FF6D4931FF6C554CFF666666FF666666FF6D6D6DFF00000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000006D6D
        6DFFB7461BFFC04013FFC04013FFCD4821FFD24C27FFDC5131FFE7583EFFDC51
        31FFEF5D46FFF96350FFF96350FFFC6453FFEF5D46FFE7583EFFC04013FFC040
        13FFC04013FFC04013FFA53F19FFA53F19FF6D4931FF6D6D6DFF666666FF0000
        000000000000000000000000000000000000000000006D6D6DFF6D6D6DFF6D6D
        6DFF6D6D6DFF6D6D6DFF6D6D6DFF6D6D6DFF6D6D6DFF6D6D6DFF6D6D6DFF6D6D
        6DFF6D6D6DFF000000000000000000000000000000000000000000000000B757
        31FFC04013FFC04013FFD24C27FFD24C27FFDC5131FFE7583EFFEF5D46FFF963
        50FFFD6554FFFD6554FFFD6A57FFFD6A57FFFD6B58FFE7583EFFB7461BFFC040
        13FFEF5D46FFF96350FFE7583EFFD24C27FFC04013FFA53F19FF6D4931FF6D6D
        6DFF6D6D6DFF666666FF666666FF605E5EFF666666FF545454FF355938FF2566
        25FF355938FF256625FF355938FF256625FF355938FF256625FF355938FF3559
        38FF4D4D4DFF666666FF6D6D6DFF00000000000000000000000000000000B757
        31FFCD4821FFD24C27FFD24C27FFE7583EFFE7583EFFF96350FFFC6453FFFD6A
        57FFFD6B58FFFD725CFFFD725CFFFD725CFFFD725CFFC04013FFEEB88AFFC557
        2BFFE7583EFFFD6655FFFC6453FFF96350FFDC5131FFD24C27FFC04013FF6D49
        31FF256625FF1B681BFF0A850AFF1B681BFF1B681BFF0A850AFF1E8F1EFF2390
        23FF239023FF239023FF239023FF168A16FF168A16FF1A961AFF0A850AFF0A85
        0AFF0A850AFF1B681BFF256625FF6D6D6DFF000000000000000000000000B757
        31FFB7461BFFD24C27FFE7583EFFDC5131FFF96350FFFC6453FFFD6A57FFFD72
        5CFFFD7860FFFD7C64FFFD7C64FFFD7C64FFD24C27FFB75731FFFDE3B0FFD588
        55FFCD4821FFFD725CFFFD6B58FFFD6554FFF96350FFE7583EFFDC5131FFC040
        13FF197719FF399A39FF43BB43FF4FC14FFF0A850AFF0A850AFF50B850FF4ABE
        4AFF4FC14FFF4FC14FFF43BB43FF43BB43FF3CB73CFF29AD29FF29AD29FF29AD
        29FF1A961AFF1A961AFF0A850AFF545454FF6D6D6DFF0000000000000000D588
        55FFC04013FFDC5131FFE7583EFFF96350FFFD6554FFFD6B58FFFD725CFFFD7C
        64FFFD7C64FFFD8469FFFD8469FFD77445FFB7461BFFFFD9A6FFFDE3B0FFFFD9
        A6FFC04013FFFD7C64FFFD725CFFFD6B58FFFC6453FFF96350FFE7583EFFC040
        13FF4C9946FF4FC14FFF52C252FF399A39FF2F982DFF197719FF399A39FF56C4
        56FF5BC55BFF52C252FF52C252FF4FC14FFF43BB43FF43BB43FF29AD29FF29AD
        29FF29AD29FF1A961AFF0A850AFF355938FF6D6D6DFF0000000000000000D774
        45FFC04013FFE7583EFFEF5D46FFFC6453FFFD6B58FFFD725CFFFD7860FFFD84
        69FFFD8469FFFD8E70FFFD8469FFC04013FFE99A7AFFFDE3B0FFFDE3B0FFFDE3
        B0FFB75731FFF1684EFFFD7C64FFFD725CFFFD6B58FFFD6554FFE7583EFFC040
        13FF4C9946FF56C456FF5BC55BFF168A16FF9FB0A4FFBFD9ACFF0A850AFF63CA
        63FF63CA63FF63CA63FF56C456FF52C252FF4FC14FFF43BB43FF43BB43FF3CB7
        3CFF29AD29FF29AD29FF0A850AFF256625FF6D6D6DFF00000000000000000000
        0000A53F19FFDC5131FFF96350FFFD6A57FFFD725CFFFD7C64FFFD8469FFFD84
        69FFFD8E70FFFE9272FFCD4821FFCC5D2FFFFFD9A6FFFFD9A6FFFFD9A6FFFFD9
        A6FFD58855FFDC5131FFFD8469FFFD7C64FFFD725CFFFD6A57FFEF5D46FFC040
        13FF70A95FFF5BC55BFF63CA63FF1B681BFFFDE3B0FFFFFFF2FF4C9946FF2390
        23FF71CB71FF69CD69FF69CD69FF63CA63FF56C456FF52C252FF43BB43FF43BB
        43FF3CB73CFF29AD29FF0A850AFF355938FF6D6D6DFF00000000000000000000
        0000D77445FFC04013FFF96350FFFD6B58FFFD7860FFFD7C64FFFD8469FFFD8E
        70FFFE9272FFCC5D2FFFC5572BFFFFCF9CFFFFD9A6FFFFD9A6FFFFD9A6FFFFD9
        A6FFD58855FFC5572BFFFD8469FFFD7C64FFFD7860FFFD6B58FFF96350FFC040
        13FF63CA63FF6FD16FFF50B850FF239023FFFFF7E8FFFFF7E8FFFFEFDFFF1977
        19FF4DB34DFF71CB71FF6FD16FFF69CD69FF63CA63FF56C456FF4FC14FFF43BB
        43FF3CB73CFF29AD29FF0A850AFF6D6D6DFF6D6D6DFF00000000000000000000
        000000000000B75731FFCD4821FFFD725CFFFD7C64FFFD8469FFFD8E70FFF992
        6FFFEB8059FFC04013FFEEB88AFFFFBF91FFFFCF9CFFFFCF9CFFFFBF91FFFFCF
        9CFFE99A7AFFCD4821FFFD8E70FFFD8469FFFD7C64FFFD725CFFDC5131FF9A58
        19FF6FD16FFF75D275FF399A39FF80B380FFFFFFF2FFFFFFF2FFFFFFF2FF9FB0
        A4FF0A850AFF71CB71FF7CD77CFF75D275FF69CD69FF63CA63FF5BC55BFF4FC1
        4FFF43BB43FF29AD29FF1B681BFF6D6D6DFF0000000000000000000000000000
        00000000000000000000C04013FFDC5131FFFD7C64FFFD8469FFFD8E70FFEB80
        59FFC04013FFEB8059FFEEB88AFFFFCF9CFFEEB88AFFFFBF91FFFFCF9CFFFFCF
        9CFFE99A7AFFC04013FFFD8E70FFFD8469FFFD7860FFE06642FFC04013FF80AB
        67FF75D275FF75D275FF168A16FFBFD9ACFFFFFFFCFFFFFFFCFFFFFFFCFFFFFF
        FCFF80B380FF197719FF7CD77CFF7CD77CFF6FD16FFF63CA63FF5BC55BFF52C2
        52FF43BB43FF0A850AFF457E45FF6D6D6DFF0000000000000000000000000000
        0000000000000000000000000000B75731FFC5572BFFEB8059FFEF7656FFC040
        13FFD77445FFBF8B84FFB1654DFF7F4C6EFF7F4C6EFFBF8B84FFFE9272FFEEB8
        8AFFEEB88AFFC04013FFFD8E70FFFD8469FFE06642FFC04013FF917930FF75D2
        75FF7CD77CFF8FE08FFF1B681BFFFFF7E8FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFF7E8FF239023FF4C9946FF7CD77CFF75D275FF6FD16FFF63CA63FF56C4
        56FF1E8F1EFF1B681BFF6D6D6DFF000000000000000000000000000000000000
        000000000000000000000000000000000000D77445FFD77445FFC04013FFA53F
        19FF341A4BFF040C72FF01046AFF040C72FF01046AFF040C72FF01046AFF7F4C
        6EFFEB8059FFC04013FFD77445FFB7461BFFA53F19FF70A95FFF6DC462FF75D2
        75FF7CD77CFF8FE08FFF0A850AFFFFF7E8FFFFF7E8FFFFF7E8FFFFF7E8FFFFF7
        E8FFFFF7E8FFBFD9ACFF1B681BFF4DB34DFF7CD77CFF6FD16FFF63CA63FF2F98
        2DFF1B681BFF666666FF00000000000000000000000000000000000000000000
        0000000000000000000000000000000000006D6D6DFF2F2F2FFF1F1F1FFF0E19
        2CFF07155BFF06187BFF0D268DFF0D268DFF0D268DFF0D268DFF0C257EFF0104
        6AFF341A4BFFA53F19FFA53F19FFB1654DFF1B681BFF44A644FF75D275FF7CD7
        7CFF8FE08FFF71CB71FF1B681BFFFFEFDFFFFFEFDFFFFFEFDFFFFDE3B0FFFFEF
        DFFFFFEFDFFFFDE3B0FF8FE08FFF1B681BFF67C067FF75D275FF2F982DFF1B68
        1BFF6D6D6DFF0000000000000000000000000000000000000000000000000000
        00000000000000000000000000000D0D0DFF000000FF020202FF020202FF0000
        00FF000000FF07155BFF102F95FF102F95FF102F95FF102F95FF102F95FF0D26
        8DFF040C72FF110C69FF0000000000000000000000001B681BFF168A16FF67C0
        67FF8FE08FFF67C067FF239023FFFDE3B0FF9FB0A4FF247EAEFF1372A2FF1372
        A2FF1372A2FF247EAEFF979797FF80AB67FF0A850AFF197719FF1B681BFF6D6D
        6DFF000000000000000000000000000000000000000000000000000000000000
        0000000000001C1C1CFF000000FF0A0A0AFF020202FF0A0A0AFF000000FF0507
        0EFF07155BFF0C257EFF12359BFF143AA0FF143AA0FF143AA0FF143AA0FF1235
        9BFF102F95FF01046AFF2E3457FF0000000000000000000000000A850AFF1B68
        1BFF168A16FF399A39FF0A850AFF247EAEFF0D73B3FF1B81CDFF1B81CDFF1B81
        CDFF1B81CDFF1B81CDFF0D73B3FF135F88FF1B681BFF256625FF6D6D6DFF0000
        0000000000000000000000000000000000000000000000000000000000000000
        00001C1C1CFF020202FF0A0A0AFF0D0D0DFF0D0D0DFF0A0A0AFF09121CFF1235
        9BFF1948AEFF1948AEFF1948AEFF1948AEFF1948AEFF1948AEFF1948AEFF1948
        AEFF143AA0FF0F2D93FF040C72FF000000000000000000000000000000000000
        000000000000457E45FF135F88FF1579BAFF1F85D4FF278CE2FF1F85D4FF278C
        E2FF1F85D4FF1F85D4FF278CE2FF1B81CDFF1372A2FF4D4D4DFF6D6D6DFF0000
        0000000000000000000000000000000000000000000000000000000000000000
        0000020202FF0D0D0DFF0D0D0DFF121212FF121212FF000000FF0F2D93FF1948
        AEFF1A4DB3FF1A4DB3FF1A4DB3FF1A4DB3FF1A4DB3FF1A4DB3FF1A4DB3FF1A4D
        B3FF1A4DB3FF1948AEFF06187BFF2E3457FF0000000000000000000000000000
        000000000000427399FF1B81CDFF278CE2FF2D92E6FF2D92E6FF2C92F1FF2C92
        F1FF2D92E6FF2D92E6FF278CE2FF278CE2FF1B81CDFF1372A2FF4D4D4DFF6D6D
        6DFF000000000000000000000000000000000000000000000000000000000000
        00FF0D0D0DFF121212FF121212FF1C1C1CFF121212FF09121CFF1A4DB3FF1A4D
        B3FF1C56BCFF1C56BCFF1C56BCFF1C56BCFF1E5FC2FF1C56BCFF1C56BCFF1C56
        BCFF1C56BCFF1A4DB3FF0D268DFF0D2968FF0000000000000000000000000000
        0000000000000D73B3FF3295FBFF3399FFFF3399FFFF3399FFFF3399FFFF3399
        FFFF3399FFFF3399FFFF3399FFFF3295FBFF2C92F1FF1B81CDFF135F88FF6D6D
        6DFF000000000000000000000000000000000000000000000000000000000A0A
        0AFF121212FF1C1C1CFF1C1C1CFF1C1C1CFF121212FF102C5BFF1C56BCFF1C56
        BCFF1E5FC2FF2265CBFF2265CBFF2265CBFF2265CBFF2265CBFF2265CBFF1E5F
        C2FF1E5FC2FF1C56BCFF1948AEFF052983FF0000000000000000000000000000
        00000D73B3FF2C92F1FF359BFFFF359BFFFF379DFFFF379DFFFF379DFFFF379D
        FFFF379DFFFF379DFFFF359BFFFF359BFFFF3399FFFF3399FFFF1579BAFF2C58
        6FFF6D6D6DFF0000000000000000000000000000000000000000000000000D0D
        0DFF1C1C1CFF1C1C1CFF242424FF242424FF121212FF081D6CFF2060C6FF2265
        CBFF2060C6FF246AD0FF246AD0FF246AD0FF246AD0FF246AD0FF246AD0FF246A
        D0FF2265CBFF2060C6FF2060C6FF0C257EFF052983FF00000000000000000000
        00000D73B3FF379DFFFF3AA0FFFF3AA0FFFF3DA2FFFF3DA2FFFF3DA2FFFF3DA2
        FFFF3DA2FFFF3DA2FFFF3AA0FFFF3AA0FFFF379DFFFF359BFFFF3295FBFF135F
        88FF6D6D6DFF0000000000000000000000000000000000000000000000001212
        12FF242424FF242424FF2C2C2CFF2A2A2AFF1A1A1AFF0E192CFF246AD0FF246A
        D0FF2671D7FF2671D7FF2877DDFF2877DDFF2877DDFF2877DDFF2877DDFF2671
        D7FF2671D7FF246AD0FF2265CBFF052983FF052983FF00000000000000000000
        00000D73B3FF3DA2FFFF3DA2FFFF3DA2FFFF40A6FFFF40A6FFFF40A6FFFF40A6
        FFFF40A6FFFF40A6FFFF3DA2FFFF3DA2FFFF3DA2FFFF3AA0FFFF3AA0FFFF1579
        BAFF2C586FFF6D6D6DFF00000000000000000000000000000000000000001C1C
        1CFF242424FF2C2C2CFF2A2A2AFF363636FF2C2C2CFF09121CFF2671D7FF2877
        DDFF2877DDFF2A7CE2FF2D82EAFF2D82EAFF2D82EAFF2D82EAFF2A7CE2FF2D82
        EAFF2877DDFF2671D7FF2671D7FF10429EFF052983FF00000000000000004273
        99FF2C92F1FF40A6FFFF43A8FFFF44AAFFFF44AAFFFF47ADFFFF47ADFFFF47AD
        FFFF44AAFFFF44AAFFFF43A8FFFF43A8FFFF40A6FFFF3DA2FFFF3DA2FFFF278C
        E2FF2C586FFF6D6D6DFF00000000000000000000000000000000000000001212
        12FF2C2C2CFF2A2A2AFF363636FF363636FF383838FF020202FF2265CBFF2A7C
        E2FF2D82EAFF2F8CF3FF2F8CF3FF2F8CF3FF2F8CF3FF2F8CF3FF2F8CF3FF2D82
        EAFF2D82EAFF2D82EAFF2877DDFF10429EFF135F88FF00000000000000003A8B
        B7FF43A8EDFF44AAFFFF47ADFFFF49AFFFFF49AFFFFF4BB1FFFF4BB1FFFF4BB1
        FFFF4BB1FFFF49AFFFFF49AFFFFF47ADFFFF44AAFFFF43A8FFFF40A6FFFF3DA2
        FFFF135F88FF6D6D6DFF00000000000000000000000000000000000000001212
        12FF363636FF363636FF363636FF383838FF3F3F3FFF1A1A1AFF052983FF2F8C
        F3FF2F8CF3FF3399FFFF3399FFFF3399FFFF359BFFFF3399FFFF3399FFFF3295
        FBFF2F8CF3FF2D82EAFF2D82EAFF10429EFF052983FF00000000000000004273
        99FF44AAFFFF49AFFFFF4DB3FFFF4DB3FFFF4EB4FFFF4EB4FFFF51B7FFFF51B7
        FFFF4EB4FFFF4EB4FFFF4DB3FFFF4DB3FFFF49AFFFFF47ADFFFF43A8FFFF40A6
        FFFF0D73B3FF6D6D6DFF00000000000000000000000000000000000000000A0A
        0AFF363636FF2F2F2FFF3F3F3FFF464646FF3F3F3FFF363636FF05070EFF2877
        DDFF2D82EAFF2F8CF3FF2F8CF3FF359BFFFF3AA0FFFF3AA0FFFF379DFFFF359B
        FFFF3399FFFF3295FBFF2C92F1FF052983FF0000000000000000000000003A8B
        B7FF4BB1FFFF4DB3FFFF51B7FFFF51B7FFFF55BBFFFF56BCFFFF56BCFFFF56BC
        FFFF56BCFFFF51B7FFFF51B7FFFF51B7FFFF4DB3FFFF4BB1FFFF47ADFFFF44AA
        FFFF1B81CDFF6D6D6DFF00000000000000000000000000000000000000001C1C
        1CFF2C2C2CFF3F3F3FFF3F3F3FFF464646FF4A4A4AFF4A4A4AFF1A1A1AFF0E19
        2CFF143AA0FF1A4DB3FF246AD0FF246AD0FF2774DAFF2D82EAFF3191F9FF359B
        FFFF3399FFFF3399FFFF278CE2FF052983FF0000000000000000000000004273
        99FF4EB4FFFF51B7FFFF55BBFFFF56BCFFFF56BCFFFF56BCFFFF56BCFFFF56BC
        FFFF56BCFFFF56BCFFFF56BCFFFF51B7FFFF51B7FFFF4EB4FFFF4DB3FFFF49AF
        FFFF1B81CDFF6D6D6DFF00000000000000000000000000000000000000000000
        00000D0D0DFF3F3F3FFF464646FF4A4A4AFF545454FF4D4D4DFF545454FF2C2C
        2CFF121212FF0A0A0AFF09121CFF081D6CFF143FA4FF1C56BCFF1D56D2FF246A
        D0FF246AD0FF2671D7FF102C5BFF181818FF0000000000000000000000003A8B
        B7FF43A8EDFF56BCFFFF56BCFFFF56BCFFFF56BCFFFF56BCFFFF56BCFFFF56BC
        FFFF56BCFFFF56BCFFFF56BCFFFF56BCFFFF55BBFFFF51B7FFFF4EB4FFFF4DB3
        FFFF1579BAFF6D6D6DFF00000000000000000000000000000000000000000000
        00000D0D0DFF363636FF4A4A4AFF4A4A4AFF3F3F3FFF545454FF605E5EFF6D6D
        6DFF717171FF717171FF3F3F3FFF1A1A1AFF010215FF07155BFF0D2968FF0618
        7BFF0D2968FF09121CFF000000FF363636FF0000000000000000000000004273
        99FF3DA2DFFF56BCFFFF56BCFFFF399FD9FF2385C6FF1579BAFF399FD9FF44AA
        FFFF4DB3FFFF4EB4FFFF51B7FFFF51B7FFFF51B7FFFF4EB4FFFF4BB1FFFF2385
        C6FF1372A2FF6D6D6DFF00000000000000000000000000000000000000000000
        0000000000000A0A0AFF4A4A4AFF545454FF545454FF545454FF666666FF7171
        71FF848484FFA4A4A4FFA4A4A4FF979797FF605E5EFF2F2F2FFF1C1C1CFF1212
        12FF1C1C1CFF2C2C2CFF020202FF000000000000000000000000000000003A8B
        B7FF2385C6FF2385C6FF1372A2FF1579BAFF3F95C3FF3F95C3FF2385C6FF1372
        A2FF1579BAFF1F85D4FF278CE2FF359BFFFF3296FCFF278CE2FF1579BAFF1876
        A6FF135F88FF6D6D6DFF00000000000000000000000000000000000000000000
        0000000000000D0D0DFF0D0D0DFF545454FF605E5EFF666666FF6D6D6DFF7171
        71FF848484FF979797FFA4A4A4FFBFD9ACFF9FB0A4FF848484FF717171FF605E
        5EFF4A4A4AFF121212FF242424FF000000000000000000000000000000000000
        00001372A2FF1372A2FF1876A6FF2385C6FF399FD9FF57A9D7FF57A9D7FF63AB
        D2FF7ABBE1FF3F95C3FF3A8BB7FF1372A2FF1876A6FF247EAEFF247EAEFF1372
        A2FF17638AFF6D6D6DFF00000000000000000000000000000000000000000000
        000000000000000000000D0D0DFF121212FF545454FF666666FF717171FF7E7E
        7EFF848484FF848484FF8F8F8FFFA4A4A4FFA4A4A4FF979797FF7E7E7EFF605E
        5EFF2A2A2AFF0A0A0AFF00000000000000000000000000000000000000000000
        0000000000001372A2FF3F95C3FF3F95C3FF57A9D7FF57A9D7FF63ABD2FF84C0
        E4FF84C0E4FFA3D0EAFFA3D0EAFFA3D0EAFF63ABD2FF699AAEFF247DB6FF0D73
        B3FF206081FF0000000000000000000000000000000000000000000000000000
        00000000000000000000000000000D0D0DFF0D0D0DFF545454FF7E7E7EFF8484
        84FF8F8F8FFF979797FF848484FF7E7E7EFF717171FF6D6D6DFF545454FF2424
        24FF0A0A0AFF0000000000000000000000000000000000000000000000000000
        0000000000001372A2FF3F95C3FF57A9D7FF63ABD2FF63ABD2FF84C0E4FF84C0
        E4FF9ECCE6FFA3D0EAFFA3D0EAFF84C0E4FF57A9D7FF3F95C3FF247EAEFF135F
        88FF6D6D6DFF0000000000000000000000000000000000000000000000000000
        000000000000000000000000000000000000000000000D0D0DFF1C1C1CFF5454
        54FF7E7E7EFF979797FF848484FF6D6D6DFF4A4A4AFF212121FF0A0A0AFF3F3F
        3FFF000000000000000000000000000000000000000000000000000000000000
        000000000000000000001372A2FF57A9D7FF63ABD2FF84C0E4FF84C0E4FF97CA
        E8FF84C0E4FF84C0E4FF63ABD2FF57A9D7FF57A9D7FF3F95C3FF1372A2FF4273
        99FF000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000D0D
        0DFF0D0D0DFF000000FF000000FF0D0D0DFF363636FF00000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        00000000000000000000000000001372A2FF63ABD2FF84C0E4FF9ECCE6FFA3D0
        EAFF9ECDE9FF84C0E4FF84C0E4FF63ABD2FF57A9D7FF1876A6FF3A8BB7FF0000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000001372A2FF3A8BB7FF84C0E4FFA3D0
        EAFFA3D0EAFF9ECCE6FF57A9D7FF247EAEFF1876A6FF00000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        000000000000000000000000000000000000000000003A8BB7FF427399FF3A8B
        B7FF427399FF3A8BB7FF427399FF3A8BB7FF0000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000}
    end
    object BitBtn4: TBitBtn
      Left = 11
      Top = 177
      Width = 118
      Height = 55
      Caption = 'F8-Consulta'
      PopupMenu = PopupMenu1
      TabOrder = 1
      OnClick = BitBtn4Click
      Glyph.Data = {
        B6040000424DB604000000000000B60000002800000020000000200000000100
        08000000000000040000120B0000120B00002000000020000000FFFFFF00CCCC
        CC00BBBBBB00AAAAAA00CC999900888888007777770099666600666666005555
        5500444444006633330033333300222222001111110000000000C0C0C0000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000101010101010
        1010101010101010101010101010101010101010101010101010101010101010
        10100F0F0F0F0F0F0F0F0F060606101010101010101010101010101010101010
        0F0F0101010100040004040F0F0F060606101010101010101010101010100F0F
        01010101010100040004040404040F0F060610101010101010101010100F0404
        010101010101000400040404040404040F06061010101010101010100F040404
        01010101010100040004040404040404040C0606101010101010100F04040404
        01010F0F0F0F0F0F0F0F0F0404040404040906060610101010100F0404040404
        0F0F0000000000000000000F0F0F040404040F060610101010100F04040B0F05
        00020F060606060606060500000006050B040F060606101010100F040F000000
        0F0A0404040404040404040F0F0F0000000B0F060606061010100F0F0000000F
        04040404040404040404040404040F0000050F060606061010100F0000000F07
        0404040404040404000000040404040F00000F060606061010100F00000F0404
        070404040404040404040400040407040F000F060606101010100F00000F0404
        040701040404040404040400070704040F000F060606101010100F00000F0404
        040400010707070707070707040404040F000F060610101010100F0000000F04
        0404010404040404040404040403040F00000F06101010101010100F0000000F
        04040404040404040404040404040F00000F101010101010101010100F000000
        0F0F040404040404040404040F0F0000000F10101010101010101010100F0000
        00000F0F0F0F0F0F0F0F0F0F000000000F061010101010101010101010100F0F
        00000000000000000000000000000F0F050C0610101010101010101010101010
        0F0F000000000000000000000F0F0202020F0F06101010101010101010101010
        10100F0F0F0F0F0F0F0F0F0F0200000202080F0F061010101010101010101010
        1010101010101010101010100F020000020F0F0F0F0610101010101010101010
        10101010101010101010101010050F0E0C0E0F0F0F0F06021010101010101010
        1010101010101010101010101010100F0D0A0F0F0F0F0F061010101010101010
        101010101010101010101010101010100F090D0F0F0F0F0F1010101010101010
        10101010101010101010101010101010100F060D0F0F0F0F1010101010101010
        1010101010101010101010101010101010050D060D0F0F0F1010101010101010
        1010101010101010101010101010101010100F0D060D0F0F1010101010101010
        101010101010101010101010101010101010100F0F0F0F101010101010101010
        1010101010101010101010101010101010101010101010101010101010101010
        1010101010101010101010101010101010101010101010101010}
    end
    object BitBtn3: TBitBtn
      Left = 11
      Top = 121
      Width = 118
      Height = 55
      Caption = 'F3-Excluir'
      PopupMenu = PopupMenu1
      TabOrder = 2
      OnClick = BitBtn3Click
      Glyph.Data = {
        1E070000424D1E070000000000003600000028000000160000001A0000000100
        180000000000E806000000000000000000000000000000000000C0C0C0C0C0C0
        C0C0C0C0C0C07F7F7F7F7F7FC0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C00000C0C0
        C0C0C0C07F7F7F7F7F7F7F7F7F7F7F7F7F7F7FC0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C07F7F7F7F7F7FC0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        0000C0C0C0C0C0C00000000000007F7F7F7F7F7F7F7F7FC0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C07F7F7F7F7F7F7F7F7F7F7F7FC0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C000000000FF00007F00007F0000000000007F7F7F7F7F7F7F7F7FC0C0
        C0C0C0C0C0C0C0C0C0C00000FF0000007F7F7F7F7F7F7F7F7F7F7F7FC0C0C0C0
        C0C0C0C0C0C0C0C000000000FF00007F00007F00007F0000007F7F7F7F7F7F7F
        7F7F7F7F7FC0C0C0C0C0C00000FF00007F0000000000007F7F7F7F7F7F7F7F7F
        7F7F7FC0C0C0C0C0C0C0C0C000000000FF00007F00007F00007F000000000000
        7F7F7F7F7F7F7F7F7F7F7F7FC0C0C00000FF00007F00007F0000000000007F7F
        7F7F7F7F7F7F7F7F7F7FC0C0C0C0C0C000000000FF00007F00007F00007F0000
        7F0000000000007F7F7F7F7F7F7F7F7F0000FF00007F00007F00007F00007F00
        00000000007F7F7F7F7F7FC0C0C0C0C0C0C0C0C000000000FF0000FF00007F00
        007F00007F00007F0000000000007F7F7F0000FF00007F00007F00007F00007F
        00007F00007F000000000000C0C0C0C0C0C0C0C0C0C0C0C00000C0C0C00000FF
        00007F00007F00007F00007F00007F00000000000000007F00007F00007F0000
        7F00007F00007F00007F000000C0C0C0C0C0C0C0C0C0C0C0C0C0C0C00000C0C0
        C00000FF0000FF00007F00007F00007F00007F00007F00007F00007F00007F00
        007F00007F00007F00007F000000C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        0000C0C0C0C0C0C00000FF0000FF00007F00007F00007F00007F00007F00007F
        00007F00007F00007F00007F000000C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C00000C0C0C0C0C0C0C0C0C00000FF0000FF00007F00007F00007F0000
        7F00007F00007F00007F00007F0000007F7F7FC0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C00000C0C0C0C0C0C0C0C0C0C0C0C00000FF0000FF00007F00
        007F00007F00007F00007F00007F0000007F7F7F7F7F7F7F7F7FC0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C00000C0C0C0C0C0C0C0C0C0C0C0C0C0C0C00000FF
        00007F00007F00007F00007F00007F00007F0000007F7F7F7F7F7F7F7F7F7F7F
        7FC0C0C0C0C0C0C0C0C0C0C0C0C0C0C00000C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C00000FF00007F00007F00007F00007F00007F00007F0000000000007F7F7F7F
        7F7F7F7F7FC0C0C0C0C0C0C0C0C0C0C0C0C0C0C00000C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C00000FF00007F00007F00007F00007F00007F00007F00007F000000
        0000007F7F7F7F7F7F7F7F7FC0C0C0C0C0C0C0C0C0C0C0C00000C0C0C0C0C0C0
        C0C0C0C0C0C00000FF00007F00007F00007F00007F00007F00007F00007F0000
        7F00007F0000007F7F7F7F7F7F7F7F7F7F7F7FC0C0C0C0C0C0C0C0C00000C0C0
        C0C0C0C0C0C0C0C0C0C00000FF00007F00007F00007F00007F0000FF0000FF00
        007F00007F00007F0000000000007F7F7F7F7F7F7F7F7FC0C0C0C0C0C0C0C0C0
        0000C0C0C0C0C0C0C0C0C00000FF00007F00007F00007F00007F0000007F7F7F
        0000FF0000FF00007F00007F00007F0000000000007F7F7F7F7F7F7F7F7F7F7F
        7FC0C0C00000C0C0C0C0C0C0C0C0C00000FF00007F00007F00007F0000007F7F
        7FC0C0C0C0C0C00000FF0000FF00007F00007F00007F0000000000007F7F7F7F
        7F7F7F7F7F7F7F7F0000C0C0C0C0C0C00000FF00007F00007F00007F00007F00
        00007F7F7FC0C0C0C0C0C0C0C0C00000FF0000FF00007F00007F00007F000000
        0000007F7F7F7F7F7F7F7F7F0000C0C0C0C0C0C00000FF00007F00007F00007F
        0000007F7F7FC0C0C0C0C0C0C0C0C0C0C0C0C0C0C00000FF0000FF00007F0000
        7F00007F0000000000007F7F7FC0C0C00000C0C0C00000FF0000FF0000FF0000
        7F00007F000000C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C00000FF00
        00FF00007F00007F00007F000000C0C0C0C0C0C00000C0C0C0C0C0C0C0C0C000
        00FF0000FF0000FFC0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C00000FF0000FF00007F00007FC0C0C0C0C0C0C0C0C00000C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C00000FF0000FFC0C0C0C0C0C0C0C0C0C0C0C00000C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        0000}
    end
    object BitBtn2: TBitBtn
      Left = 11
      Top = 66
      Width = 118
      Height = 55
      Caption = 'F4-Saida'
      PopupMenu = PopupMenu1
      TabOrder = 3
      OnClick = BitBtn2Click
      Glyph.Data = {
        76020000424D7602000000000000760000002800000020000000200000000100
        0400000000000002000000000000000000001000000000000000000000000000
        8000008000000080800080000000800080008080000080808000C0C0C0000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888887788877
        88877888000887788888888788877888778887780EE088877888888877888778
        887788870EE607888778877888778887788877880EE660778887888778887788
        877888770EE666007788878887788877888778880EE666600077800000000000
        008887780EE666660000888888888888807788870EE666660778888888888888
        800077880EE666660778888888888887800000000EE666660778888888888807
        707777770EE666660778888888888800707777770EE666660778888888888806
        007777770EE666660778888888888806607777770EE60066077888888777770E
        660777770EE07066077888887777770EE66077770EE0F066077888800000000E
        EE6607770EE60066077888066666666EEEE660770EE666660778880EEEEEEEEE
        EEEE66070EE666660778880EEFFFFFFFFFFEE6070EE666660778880EEEEEEEEE
        EFEE60770EE66666077888800000000EFEE607770EE66666077888888888880E
        EE6077770EE66666077888888888880EE60777770EE66666077888888888880E
        607777770EE6666607788888888888060077777770EE66660778888888888800
        80777777770EE6660778888888888888807777777770EE660778888888888888
        8077777777770EE6077888888888888880777777777770EE0788888888888888
        8000000000000000088888888888888888888888888888888888}
    end
  end
  object sFrequencia: TSQLDataSet
    CommandText = 
      'select  f.*,'#13#10'           u.NOMECLIENTE'#13#10'from FREQUENCIA f '#13#10'inne' +
      'r join  CLIENTES u '#13#10'on u.CODCLIENTE = f.COD_FUNCIONARIO'
    MaxBlobSize = -1
    Params = <>
    SQLConnection = DM.sqlsisAdimin
    Left = 120
    Top = 192
    object sFrequenciaCOD_FREQUENCIA: TIntegerField
      FieldName = 'COD_FREQUENCIA'
      Required = True
    end
    object sFrequenciaCOD_FUNCIONARIO: TIntegerField
      FieldName = 'COD_FUNCIONARIO'
    end
    object sFrequenciaDATA: TDateField
      FieldName = 'DATA'
    end
    object sFrequenciaHORAINICIO: TSQLTimeStampField
      FieldName = 'HORAINICIO'
    end
    object sFrequenciaHORASAIDA: TSQLTimeStampField
      FieldName = 'HORASAIDA'
    end
    object sFrequenciaNOMECLIENTE: TStringField
      FieldName = 'NOMECLIENTE'
      Required = True
      Size = 50
    end
  end
  object dFrequencia: TDataSetProvider
    DataSet = sFrequencia
    Options = [poAllowCommandText]
    Left = 160
    Top = 192
  end
  object cFrequencia: TClientDataSet
    Aggregates = <>
    Params = <>
    ProviderName = 'dFrequencia'
    Left = 200
    Top = 192
    object cFrequenciaCOD_FREQUENCIA: TIntegerField
      FieldName = 'COD_FREQUENCIA'
      Required = True
    end
    object cFrequenciaCOD_FUNCIONARIO: TIntegerField
      FieldName = 'COD_FUNCIONARIO'
    end
    object cFrequenciaDATA: TDateField
      FieldName = 'DATA'
    end
    object cFrequenciaHORAINICIO: TSQLTimeStampField
      FieldName = 'HORAINICIO'
      EditMask = 'hh:mm:ss'
    end
    object cFrequenciaHORASAIDA: TSQLTimeStampField
      FieldName = 'HORASAIDA'
      EditMask = '99:99:99'
    end
    object cFrequenciaNOMECLIENTE: TStringField
      FieldName = 'NOMECLIENTE'
      Required = True
      Size = 50
    end
  end
  object DtSrc: TDataSource
    DataSet = cFrequencia
    Left = 240
    Top = 192
  end
  object sFuncionarios: TSQLDataSet
    CommandText = 
      'select * From CLIENTES c'#13#10'inner join CARGOSFUNCOES cf on cf.COD_' +
      'CARGOSFUNCOES = c.CARGOFUNCAO'#13#10'where cf.DESCRICAO = :CARGO'#13#10'orde' +
      'r by NOMECLIENTE'#13#10
    MaxBlobSize = -1
    Params = <
      item
        DataType = ftString
        Name = 'CARGO'
        ParamType = ptInput
      end>
    SQLConnection = DM.sqlsisAdimin
    Left = 120
    Top = 152
    object sFuncionariosCODCLIENTE: TIntegerField
      FieldName = 'CODCLIENTE'
      Required = True
    end
    object sFuncionariosNOMECLIENTE: TStringField
      FieldName = 'NOMECLIENTE'
      Required = True
      Size = 50
    end
    object sFuncionariosRAZAOSOCIAL: TStringField
      FieldName = 'RAZAOSOCIAL'
      Required = True
      Size = 50
    end
    object sFuncionariosCONTATO: TStringField
      FieldName = 'CONTATO'
      Size = 30
    end
    object sFuncionariosTIPOFIRMA: TSmallintField
      FieldName = 'TIPOFIRMA'
      Required = True
    end
    object sFuncionariosCPF: TStringField
      FieldName = 'CPF'
      Size = 14
    end
    object sFuncionariosCNPJ: TStringField
      FieldName = 'CNPJ'
      Size = 18
    end
    object sFuncionariosINSCESTADUAL: TStringField
      FieldName = 'INSCESTADUAL'
      Size = 24
    end
    object sFuncionariosRG: TStringField
      FieldName = 'RG'
      Size = 14
    end
    object sFuncionariosSEGMENTO: TSmallintField
      FieldName = 'SEGMENTO'
      Required = True
    end
    object sFuncionariosREGIAO: TSmallintField
      FieldName = 'REGIAO'
      Required = True
    end
    object sFuncionariosLIMITECREDITO: TFloatField
      FieldName = 'LIMITECREDITO'
    end
    object sFuncionariosDATACADASTRO: TDateField
      FieldName = 'DATACADASTRO'
      Required = True
    end
    object sFuncionariosCODUSUARIO: TIntegerField
      FieldName = 'CODUSUARIO'
      Required = True
    end
    object sFuncionariosSTATUS: TSmallintField
      FieldName = 'STATUS'
      Required = True
    end
    object sFuncionariosHOMEPAGE: TStringField
      FieldName = 'HOMEPAGE'
      Size = 40
    end
    object sFuncionariosPRAZORECEBIMENTO: TSmallintField
      FieldName = 'PRAZORECEBIMENTO'
    end
    object sFuncionariosPRAZOENTREGA: TSmallintField
      FieldName = 'PRAZOENTREGA'
    end
    object sFuncionariosCODBANCO: TSmallintField
      FieldName = 'CODBANCO'
    end
    object sFuncionariosBASE_ICMS: TSmallintField
      FieldName = 'BASE_ICMS'
    end
    object sFuncionariosDATANASC: TDateField
      FieldName = 'DATANASC'
    end
    object sFuncionariosCONTA_CLIENTE: TStringField
      FieldName = 'CONTA_CLIENTE'
      Size = 15
    end
    object sFuncionariosOBS: TStringField
      FieldName = 'OBS'
      Size = 200
    end
    object sFuncionariosTEM_IE: TStringField
      FieldName = 'TEM_IE'
      FixedChar = True
      Size = 1
    end
    object sFuncionariosDATARESC: TDateField
      FieldName = 'DATARESC'
    end
    object sFuncionariosNOMEMAE: TStringField
      FieldName = 'NOMEMAE'
      Size = 80
    end
    object sFuncionariosSEXO: TStringField
      FieldName = 'SEXO'
      FixedChar = True
      Size = 1
    end
    object sFuncionariosFORMA_CORRESPOND: TStringField
      FieldName = 'FORMA_CORRESPOND'
      Size = 30
    end
    object sFuncionariosGRUPO_CLIENTE: TStringField
      FieldName = 'GRUPO_CLIENTE'
      Size = 30
    end
    object sFuncionariosCODINCLUCANC: TIntegerField
      FieldName = 'CODINCLUCANC'
    end
    object sFuncionariosEXIST_COBERT: TStringField
      FieldName = 'EXIST_COBERT'
      Size = 6
    end
    object sFuncionariosEXISTCOPART: TStringField
      FieldName = 'EXISTCOPART'
      Size = 6
    end
    object sFuncionariosDATAREINC: TDateField
      FieldName = 'DATAREINC'
    end
    object sFuncionariosGERAAVISO: TStringField
      FieldName = 'GERAAVISO'
      FixedChar = True
      Size = 1
    end
    object sFuncionariosGERAENV: TStringField
      FieldName = 'GERAENV'
      FixedChar = True
      Size = 1
    end
    object sFuncionariosGERABOL: TStringField
      FieldName = 'GERABOL'
      FixedChar = True
      Size = 1
    end
    object sFuncionariosEMVIAGEM: TStringField
      FieldName = 'EMVIAGEM'
      FixedChar = True
      Size = 1
    end
    object sFuncionariosDTAALTERA: TDateField
      FieldName = 'DTAALTERA'
    end
    object sFuncionariosSERIELETRA: TStringField
      FieldName = 'SERIELETRA'
      Size = 4
    end
    object sFuncionariosSERIE: TStringField
      FieldName = 'SERIE'
      Size = 4
    end
    object sFuncionariosRA: TStringField
      FieldName = 'RA'
      Size = 10
    end
    object sFuncionariosCURSO: TStringField
      FieldName = 'CURSO'
      Size = 50
    end
    object sFuncionariosIP: TStringField
      FieldName = 'IP'
      Size = 60
    end
    object sFuncionariosN_CONTRATO: TStringField
      FieldName = 'N_CONTRATO'
      Size = 60
    end
    object sFuncionariosMAC: TStringField
      FieldName = 'MAC'
      Size = 60
    end
    object sFuncionariosMARCA: TStringField
      FieldName = 'MARCA'
      Size = 60
    end
    object sFuncionariosBANDA_UPLOAD: TStringField
      FieldName = 'BANDA_UPLOAD'
      Size = 60
    end
    object sFuncionariosBANDA_DOWLOAD: TStringField
      FieldName = 'BANDA_DOWLOAD'
      Size = 60
    end
    object sFuncionariosTORRE_CONECCAO: TStringField
      FieldName = 'TORRE_CONECCAO'
      Size = 60
    end
    object sFuncionariosCOD_FAIXA: TIntegerField
      FieldName = 'COD_FAIXA'
    end
    object sFuncionariosDESCONTO: TFloatField
      FieldName = 'DESCONTO'
    end
    object sFuncionariosMENSALIDADE: TFloatField
      FieldName = 'MENSALIDADE'
    end
    object sFuncionariosANUIDADE: TFloatField
      FieldName = 'ANUIDADE'
    end
    object sFuncionariosPARCELA: TIntegerField
      FieldName = 'PARCELA'
    end
    object sFuncionariosPARCELAGERADAS: TIntegerField
      FieldName = 'PARCELAGERADAS'
    end
    object sFuncionariosNUMERO: TIntegerField
      FieldName = 'NUMERO'
    end
    object sFuncionariosDATANASCIMENTO: TSQLTimeStampField
      FieldName = 'DATANASCIMENTO'
    end
    object sFuncionariosANOLETIVO: TStringField
      FieldName = 'ANOLETIVO'
      Size = 4
    end
    object sFuncionariosSITUACAOESCOLAR: TStringField
      FieldName = 'SITUACAOESCOLAR'
      Size = 2
    end
    object sFuncionariosRGMAE: TStringField
      FieldName = 'RGMAE'
      Size = 15
    end
    object sFuncionariosCPFMAE: TStringField
      FieldName = 'CPFMAE'
      Size = 14
    end
    object sFuncionariosPAI: TStringField
      FieldName = 'PAI'
      Size = 30
    end
    object sFuncionariosRGPAI: TStringField
      FieldName = 'RGPAI'
      Size = 15
    end
    object sFuncionariosCPFPAI: TStringField
      FieldName = 'CPFPAI'
      Size = 14
    end
    object sFuncionariosLANCADOCLASSE: TIntegerField
      FieldName = 'LANCADOCLASSE'
    end
    object sFuncionariosTRANSPORTE: TStringField
      FieldName = 'TRANSPORTE'
      Size = 50
    end
    object sFuncionariosCIDADENASC: TStringField
      FieldName = 'CIDADENASC'
      Size = 30
    end
    object sFuncionariosUFNASC: TStringField
      FieldName = 'UFNASC'
      Size = 2
    end
    object sFuncionariosNACIONALIDADE: TStringField
      FieldName = 'NACIONALIDADE'
      Size = 15
    end
    object sFuncionariosCERTIDAONASCNUM: TStringField
      FieldName = 'CERTIDAONASCNUM'
      Size = 10
    end
    object sFuncionariosLIVRONASC: TStringField
      FieldName = 'LIVRONASC'
      Size = 10
    end
    object sFuncionariosFLLIVRONASC: TStringField
      FieldName = 'FLLIVRONASC'
      Size = 5
    end
    object sFuncionariosLOCALTRABPAI: TStringField
      FieldName = 'LOCALTRABPAI'
      Size = 30
    end
    object sFuncionariosLOCALTRABMAE: TStringField
      FieldName = 'LOCALTRABMAE'
      Size = 30
    end
    object sFuncionariosTELTRABPAI: TStringField
      FieldName = 'TELTRABPAI'
      Size = 15
    end
    object sFuncionariosTELTRABMAE: TStringField
      FieldName = 'TELTRABMAE'
      Size = 15
    end
    object sFuncionariosINFONECESSARIAS: TStringField
      FieldName = 'INFONECESSARIAS'
      Size = 30
    end
    object sFuncionariosCARTEIRAVACINACAO: TStringField
      FieldName = 'CARTEIRAVACINACAO'
      Size = 10
    end
    object sFuncionariosRAPRODESP: TStringField
      FieldName = 'RAPRODESP'
      Size = 10
    end
    object sFuncionariosLOCALTRABALUNO: TStringField
      FieldName = 'LOCALTRABALUNO'
      Size = 30
    end
    object sFuncionariosTELTRABALUNO: TStringField
      FieldName = 'TELTRABALUNO'
      Size = 15
    end
    object sFuncionariosRAPROD: TStringField
      FieldName = 'RAPROD'
      Size = 15
    end
    object sFuncionariosCERT_NAS_COMARCA: TStringField
      FieldName = 'CERT_NAS_COMARCA'
      Size = 50
    end
    object sFuncionariosCERT_NAS_UF: TStringField
      FieldName = 'CERT_NAS_UF'
      Size = 2
    end
    object sFuncionariosCERT_NAS_MUNICIPIO: TStringField
      FieldName = 'CERT_NAS_MUNICIPIO'
      Size = 50
    end
    object sFuncionariosCERT_NAS_DISTRITO: TStringField
      FieldName = 'CERT_NAS_DISTRITO'
      Size = 50
    end
    object sFuncionariosCERT_NAS_SUBDISTRITO: TStringField
      FieldName = 'CERT_NAS_SUBDISTRITO'
      Size = 50
    end
    object sFuncionariosDIVERSO1: TStringField
      FieldName = 'DIVERSO1'
      Size = 50
    end
    object sFuncionariosDIVERSO2: TStringField
      FieldName = 'DIVERSO2'
      Size = 50
    end
    object sFuncionariosDATAEMISSAORG: TDateField
      FieldName = 'DATAEMISSAORG'
    end
    object sFuncionariosESTADORG: TStringField
      FieldName = 'ESTADORG'
      FixedChar = True
      Size = 2
    end
    object sFuncionariosCOMUNICAALUNO: TStringField
      FieldName = 'COMUNICAALUNO'
      Size = 50
    end
    object sFuncionariosFONEMAE: TStringField
      FieldName = 'FONEMAE'
      Size = 15
    end
    object sFuncionariosCELULARMAE: TStringField
      FieldName = 'CELULARMAE'
      Size = 15
    end
    object sFuncionariosCOMUNICAMAE: TStringField
      FieldName = 'COMUNICAMAE'
      Size = 50
    end
    object sFuncionariosFONEPAI: TStringField
      FieldName = 'FONEPAI'
      Size = 15
    end
    object sFuncionariosCELULARPAI: TStringField
      FieldName = 'CELULARPAI'
      Size = 15
    end
    object sFuncionariosCOMUNICAPAI: TStringField
      FieldName = 'COMUNICAPAI'
      Size = 50
    end
    object sFuncionariosVALOR_MATRICULA: TFloatField
      FieldName = 'VALOR_MATRICULA'
    end
    object sFuncionariosDATATRANSF: TDateField
      FieldName = 'DATATRANSF'
    end
    object sFuncionariosCOR_RACA: TStringField
      FieldName = 'COR_RACA'
      Size = 25
    end
    object sFuncionariosPERIODO: TStringField
      FieldName = 'PERIODO'
      Size = 15
    end
    object sFuncionariosFOTO: TStringField
      FieldName = 'FOTO'
      Size = 300
    end
    object sFuncionariosDATA_MATRICULA: TSQLTimeStampField
      FieldName = 'DATA_MATRICULA'
    end
    object sFuncionariosCODRESPONSAVEL: TIntegerField
      FieldName = 'CODRESPONSAVEL'
    end
    object sFuncionariosID_COB: TIntegerField
      FieldName = 'ID_COB'
    end
    object sFuncionariosCOD_TRANPORTADORA: TIntegerField
      FieldName = 'COD_TRANPORTADORA'
    end
    object sFuncionariosBLOQUEADO: TStringField
      FieldName = 'BLOQUEADO'
      FixedChar = True
      Size = 1
    end
    object sFuncionariosBLOQUEIO: TStringField
      FieldName = 'BLOQUEIO'
      FixedChar = True
      Size = 1
    end
    object sFuncionariosCFOP: TStringField
      FieldName = 'CFOP'
      FixedChar = True
      Size = 4
    end
    object sFuncionariosCOD_CLI: TStringField
      FieldName = 'COD_CLI'
      Size = 10
    end
    object sFuncionariosCORTESIA: TStringField
      FieldName = 'CORTESIA'
      FixedChar = True
      Size = 1
    end
    object sFuncionariosVALOR_CONSUMO: TFloatField
      FieldName = 'VALOR_CONSUMO'
    end
    object sFuncionariosVALOR_CORTESIA: TFloatField
      FieldName = 'VALOR_CORTESIA'
    end
    object sFuncionariosE_FORNECEDOR: TStringField
      FieldName = 'E_FORNECEDOR'
      FixedChar = True
      Size = 1
    end
    object sFuncionariosCODFORNECEDOR: TIntegerField
      FieldName = 'CODFORNECEDOR'
    end
    object sFuncionariosCARGOFUNCAO: TIntegerField
      FieldName = 'CARGOFUNCAO'
    end
    object sFuncionariosCODFISCAL: TStringField
      FieldName = 'CODFISCAL'
      FixedChar = True
      Size = 1
    end
    object sFuncionariosCOD_CARGOSFUNCOES: TIntegerField
      FieldName = 'COD_CARGOSFUNCOES'
      Required = True
    end
    object sFuncionariosDESCRICAO: TStringField
      FieldName = 'DESCRICAO'
      Size = 100
    end
  end
  object Timer1: TTimer
    Enabled = False
    OnTimer = Timer1Timer
    Left = 296
    Top = 360
  end
  object sdsFrequencia: TSQLDataSet
    CommandText = 'select * from FREQUENCIA'
    MaxBlobSize = -1
    Params = <>
    SQLConnection = DM.sqlsisAdimin
    Left = 120
    Top = 232
    object sdsFrequenciaCOD_FREQUENCIA: TIntegerField
      FieldName = 'COD_FREQUENCIA'
      ProviderFlags = [pfInUpdate, pfInWhere, pfInKey]
      Required = True
    end
    object sdsFrequenciaCOD_FUNCIONARIO: TIntegerField
      FieldName = 'COD_FUNCIONARIO'
      ProviderFlags = [pfInUpdate]
    end
    object sdsFrequenciaDATA: TDateField
      FieldName = 'DATA'
      ProviderFlags = [pfInUpdate]
    end
    object sdsFrequenciaHORAINICIO: TSQLTimeStampField
      FieldName = 'HORAINICIO'
      ProviderFlags = [pfInUpdate]
    end
    object sdsFrequenciaHORASAIDA: TSQLTimeStampField
      FieldName = 'HORASAIDA'
      ProviderFlags = [pfInUpdate]
    end
  end
  object dspFrequencia: TDataSetProvider
    DataSet = sdsFrequencia
    UpdateMode = upWhereKeyOnly
    Left = 160
    Top = 232
  end
  object cdsFrequencia: TClientDataSet
    Aggregates = <>
    Params = <>
    ProviderName = 'dspFrequencia'
    Left = 200
    Top = 232
    object cdsFrequenciaCOD_FREQUENCIA: TIntegerField
      FieldName = 'COD_FREQUENCIA'
      ProviderFlags = [pfInUpdate, pfInWhere, pfInKey]
      Required = True
    end
    object cdsFrequenciaCOD_FUNCIONARIO: TIntegerField
      FieldName = 'COD_FUNCIONARIO'
      ProviderFlags = [pfInUpdate]
    end
    object cdsFrequenciaDATA: TDateField
      FieldName = 'DATA'
      ProviderFlags = [pfInUpdate]
    end
    object cdsFrequenciaHORAINICIO: TSQLTimeStampField
      FieldName = 'HORAINICIO'
      ProviderFlags = [pfInUpdate]
    end
    object cdsFrequenciaHORASAIDA: TSQLTimeStampField
      FieldName = 'HORASAIDA'
      ProviderFlags = [pfInUpdate]
    end
  end
  object sAusentes: TSQLDataSet
    CommandText = 'select * from mostrafuncionarios(:datapresenca)'
    MaxBlobSize = -1
    Params = <
      item
        DataType = ftDate
        Name = 'datapresenca'
        ParamType = ptInput
        Value = '23/05/2009'
      end>
    SQLConnection = DM.sqlsisAdimin
    Left = 128
    Top = 360
    object sAusentesCODIGO: TIntegerField
      FieldName = 'CODIGO'
    end
    object sAusentesNOME: TStringField
      FieldName = 'NOME'
      Size = 100
    end
  end
  object dAusentes: TDataSetProvider
    DataSet = sAusentes
    Left = 160
    Top = 360
  end
  object cAusentes: TClientDataSet
    Aggregates = <>
    Params = <
      item
        DataType = ftDate
        Name = 'datapresenca'
        ParamType = ptInput
        Value = '23/05/2009'
      end>
    ProviderName = 'dAusentes'
    Left = 192
    Top = 360
    object cAusentesCODIGO: TIntegerField
      FieldName = 'CODIGO'
    end
    object cAusentesNOME: TStringField
      FieldName = 'NOME'
      Size = 100
    end
  end
  object dtsrcAusentes: TDataSource
    DataSet = cAusentes
    Left = 224
    Top = 360
  end
  object sColaborador: TSQLDataSet
    CommandText = 
      'select  fr.COD_FUNCIONARIO, '#13#10'           fu.NOMECLIENTE'#13#10'from FR' +
      'EQUENCIA fr inner join CLIENTES fu '#13#10'on fu.CODCLIENTE = fr.COD_F' +
      'UNCIONARIO '#13#10'where fu.NOMECLIENTE = :pNome '#13#10'and fr.DATA = :pDat' +
      'a'#13#10
    MaxBlobSize = -1
    Params = <
      item
        DataType = ftString
        Name = 'pNome'
        ParamType = ptInput
      end
      item
        DataType = ftDate
        Name = 'pData'
        ParamType = ptInput
      end>
    SQLConnection = DM.sqlsisAdimin
    Left = 308
    Top = 152
    object sColaboradorCOD_FUNCIONARIO: TIntegerField
      FieldName = 'COD_FUNCIONARIO'
    end
    object sColaboradorNOMECLIENTE: TStringField
      FieldName = 'NOMECLIENTE'
      Required = True
      Size = 50
    end
  end
  object PopupMenu1: TPopupMenu
    Left = 428
    Top = 192
    object Entrada1: TMenuItem
      Caption = 'Entrada'
      ShortCut = 113
      OnClick = BitBtn1Click
    end
    object Saida1: TMenuItem
      Caption = 'Saida'
      ShortCut = 115
      OnClick = BitBtn2Click
    end
    object Excluir1: TMenuItem
      Caption = 'Excluir'
      ShortCut = 114
      OnClick = BitBtn3Click
    end
    object Consulta1: TMenuItem
      Caption = 'Consulta'
      ShortCut = 119
      OnClick = BitBtn4Click
    end
  end
  object sAtivo: TSQLDataSet
    CommandText = 
      'select  fr.COD_FUNCIONARIO, '#13#10'           fu.NOMECLIENTE'#13#10'from FR' +
      'EQUENCIA fr inner join CLIENTES fu '#13#10'on fu.CODCLIENTE = fr.COD_F' +
      'UNCIONARIO '#13#10'where fr.HORASAIDA is null and fr.COD_FUNCIONARIO =' +
      ' :nome'
    MaxBlobSize = -1
    Params = <
      item
        DataType = ftString
        Name = 'nome'
        ParamType = ptInput
      end>
    SQLConnection = DM.sqlsisAdimin
    Left = 372
    Top = 128
    object IntegerField1: TIntegerField
      FieldName = 'COD_FUNCIONARIO'
    end
    object StringField1: TStringField
      FieldName = 'NOMECLIENTE'
      Required = True
      Size = 50
    end
  end
end
